;;;QQ:67762207
[@ɳ1]
{
#IF
checkhum $00D2005
#ACT
MOV D0 %P9

#IF
checkhum $01D2005
#ACT
MOV D1 %P9

#IF
checkhum $02D2005
#ACT
MOV D2 %P9

#IF
checkhum $03D2005
#ACT
MOV D3 %P9
#if
#say
רΪɳĵ,ͨɸý׶.\
ÿ4Сʱˢһ,ᱬκζ.ֻ.\
еĽ©ˢ,߲еκ,оǷҪ.\
Ҫеض֮\
<һŸ/@gosingunfuben1(1)> (<$OUTPUT(D0)>) ȡ100.\\
<Ÿ/@gosingunfuben1(2)> (<$OUTPUT(D1)>) ȡ150.\\
<Ÿ/@gosingunfuben1(3)> (<$OUTPUT(D2)>) ȡ200.\\
<ĺŸ/@gosingunfuben1(4)> (<$OUTPUT(D3)>) ȡ250.\\
<뿪/@exit>

[@gosingunfuben1()]
#if
#act
MOV D0 %ARG(1)

#IF
checkitem ض֮ 1
equal D0 1
;checkhum $00D2005 1
checkcmd checkuserjf 100
#act
actcmd SETUSERJF - 100 ɳ
take ض֮ 1
map $00D2005
monclear $00D2005 ħʯػ
break

#IF
equal D0 2
checkitem ض֮ 1
;checkhum $01D2005 1
checkcmd checkuserjf 150
#act
actcmd SETUSERJF - 150 ɳ
take ض֮ 1
map $01D2005
monclear $01D2005 ħʯػ
break



#IF
equal D0 3
checkitem ض֮ 1
;;checkhum $02D2005 1
checkcmd checkuserjf 200
#act
actcmd SETUSERJF - 200 ɳ
take ض֮ 1
map $02D2005
monclear $02D2005 ħʯػ
break


#IF
equal D0 4
checkitem ض֮ 1
;;checkhum $03D2005 1
checkcmd checkuserjf 250
#act
actcmd SETUSERJF - 250 ɳ
take ض֮ 1
map $03D2005
monclear $03D2005 ħʯػ
break

#elsesay
ԲĻֲȱٵضۣ֮޷!\
<뿪/@exit>
}
;;;QQ:67762207